home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1996 #14 / Monster Media No. 14 (April 1996) (Monster Media, Inc.).ISO / prog_bas / basicos2.zip / ARRAYS.BAS < prev    next >
BASIC Source File  |  1996-02-06  |  171b  |  9 lines

  1. 10 dim A(10 ,10 ,10 ,10 )
  2. 20 for I=0 to 9 
  3. 30 for J=0 to 9 
  4. 40 for K=0 to 9 
  5. 50 for L=0 to 9 
  6. 60 A(I,J,K,L)=INDEX
  7. 70 INDEX=INDEX+1 
  8. 80 next L:next K:next J:next I
  9.